100 POKE53280,6:PRINT"[147] ALLE BLOCKS DER BAM WERDEN ALS BELEGT"
102 PRINT" GEKENNZEICHNET, D.H. 'NO BLOCKS FREE.'"
104 INPUT" DISK READY   J[157][157][157]";A$:IFA$<>"J"THENSTOP
105 PRINT" BITTE 1.5 MIN. WARTEN....."
106 OPEN1,8,15:OPEN15,8,15,"I"
110 FORSP=1TO17:FORSE=0TO20:PRINT#1,"B-F:"0;SP;SE:NEXTSE:NEXTSP
120 FORSP=18TO24:FORSE=0TO18:PRINT#1,"B-F:"0;SP;SE:NEXTSE:NEXTSP
130 FORSP=25TO30:FORSE=0TO17:PRINT#1,"B-F:"0;SP;SE:NEXTSE:NEXTSP
140 FORSP=31TO35:FORSE=0TO16:PRINT#1,"B-F:"0;SP;SE:NEXTSE:NEXTSP:CLOSE1
206 OPEN1,8,15
210 FORSP=1TO17:FORSE=0TO20:PRINT#1,"B-A:"0;SP;SE:NEXTSE:NEXTSP
220 FORSP=18TO24:FORSE=0TO18:PRINT#1,"B-A:"0;SP;SE:NEXTSE:NEXTSP
230 FORSP=25TO30:FORSE=0TO17:PRINT#1,"B-A:"0;SP;SE:NEXTSE:NEXTSP
240 FORSP=31TO35:FORSE=0TO16:PRINT#1,"B-A:"0;SP;SE:NEXTSE:NEXTSP:CLOSE1
250 CLOSE15:END